object PurchaseForm: TPurchaseForm
  Left = 365
  Top = 221
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Recharge Credit Card'
  ClientHeight = 250
  ClientWidth = 319
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 11
    Top = 232
    Width = 199
    Height = 13
    Caption = 'Contacting Server.  Please Wait ...'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object OkBtn: TButton
    Left = 48
    Top = 192
    Width = 75
    Height = 25
    Caption = 'OK'
    TabOrder = 0
    OnClick = OkBtnClick
  end
  object CancelBtn: TButton
    Left = 176
    Top = 192
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    TabOrder = 1
    OnClick = CancelBtnClick
  end
  object Panel1: TPanel
    Left = 0
    Top = 8
    Width = 319
    Height = 169
    BevelOuter = bvNone
    TabOrder = 2
    object Label1: TLabel
      Left = 11
      Top = 7
      Width = 224
      Height = 13
      Caption = 'Please Enter Your Personal ID Number:'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label3: TLabel
      Left = 11
      Top = 70
      Width = 186
      Height = 13
      Caption = 'Please Enter Amount To Charge:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object val25label: TLabel
      Left = 72
      Top = 96
      Width = 18
      Height = 13
      Caption = '$25'
    end
    object val50Label: TLabel
      Left = 72
      Top = 120
      Width = 18
      Height = 13
      Caption = '$50'
    end
    object val100label: TLabel
      Left = 72
      Top = 144
      Width = 24
      Height = 13
      Caption = '$100'
    end
    object LocalPinNo: TEdit
      Left = 123
      Top = 32
      Width = 88
      Height = 19
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Lucida Console'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      PasswordChar = '*'
      TabOrder = 0
      Text = 'LocalPinNo'
    end
    object val25: TRadioButton
      Left = 48
      Top = 94
      Width = 17
      Height = 17
      Checked = True
      TabOrder = 1
      TabStop = True
    end
    object val50: TRadioButton
      Left = 48
      Top = 118
      Width = 17
      Height = 17
      TabOrder = 2
    end
    object val100: TRadioButton
      Left = 48
      Top = 142
      Width = 17
      Height = 17
      TabOrder = 3
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 3000
    OnTimer = DoTimer
    Left = 256
    Top = 40
  end
end